home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / time / ITimeCalc.lha / ITimeCalc / ITimeCalc.c < prev    next >
C/C++ Source or Header  |  1999-01-13  |  3KB  |  78 lines
  1. /*
  2.     ITimeCalc v1.0 © 1999 Fredrik Rambris. Restrictionless.
  3.     Description: Shows you the current Internet-time invented by Swatch.
  4.  
  5.     Use freely to implement this new timemeasuring into your programs.
  6.     No guarantees. Use at own risc.
  7.  
  8.  
  9. The following was grabbed from http://www.swatch.com.
  10. ----------------------------------------------------------------------------
  11.  
  12. What is this new Universal Time?
  13.  
  14. Timed by Swatch
  15.  
  16. Internet Time represents a completely new global concept of time. So what
  17. is the deal? Basically, the Swatch Beat, the revolutionary new unit of time
  18. means the following:
  19.  
  20. No Time Zones
  21. No Geographical Borders
  22.  
  23. How long is a Swatch beat? In short we have divided up the virtual and real
  24. day into 1000 "beats". One Swatch beat is the equivalent of 1 minute 26.4
  25. seconds. That means that 12 noon in the old time system is the equivalent
  26. of @500 Swatch beats.
  27.  
  28. Okay, so how can a surfer in New York, or a passenger on a transatlantic
  29. flight know when it is @500 Swatch Beats in Central Europe for example? How
  30. can the New York surfer make a date for a chat with his cyber friend in
  31. Rome? Easy, Internet Time is the same all over the world. (see converter)
  32.  
  33. How is this possible? We are not just creating a new way of measuring time,
  34. we are also creating a new meridian in Biel, Switzerland, home of Swatch.
  35. Biel Mean Time (BMT) will be the universal reference for Internet Time. A
  36. day in Internet Time begins at midnight BMT (@000 Swatch Beats) (Central
  37. European Wintertime).
  38.  
  39. The meridian is marked for all to see on the façade of the Swatch
  40. International Headquarters on Jakob-Staempfli Street, Biel, Switzerland. So
  41. it is the same time all over the world, be it night or day, the era of time
  42. zones has disappeared.
  43.  
  44. The BMT meridian was inaugurated on 23 October 1998 in the presence of
  45. Nicholas Negroponte, founder and director of the Massachusetts Institute of
  46. Technology`s Media Laboratory.
  47.  
  48. */
  49.  
  50. #include <clib/dos_protos.h>
  51. #include <clib/locale_protos.h>
  52.  
  53. LONG GetITime( struct Locale *i_locale );
  54.  
  55. void main(void)
  56. {
  57.     struct Locale *loc=NULL;
  58.  
  59.     if( !( loc=OpenLocale( NULL ) ) ) goto error;
  60.  
  61.     Printf("The current internet-time is: @ %ld\n",GetITime( loc ) );
  62.     error:
  63.     if( loc )
  64.     {
  65.         CloseLocale( loc );
  66.         loc=NULL;
  67.     }
  68. }
  69.  
  70. /* This is the function that does it. It returns -1 if you don't give it a Locale*/
  71. LONG GetITime( struct Locale *i_locale )
  72. {
  73.     struct DateStamp ds;
  74.     if( !i_locale ) return( -1L );
  75.     DateStamp(&ds);
  76.  
  77.     return( (((ds.ds_Minute+i_locale->loc_GMTOffset+60)%1440)*1000)/1440 );
  78. }